%%%%%%BILIS EXPUESTA A NAFTALENO %%%%%% 
x=ex(1,1:33);
y=em(2:51,1);
Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa1;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa2;
surface_discrepancy_dam(Zref, Z, x, y)


Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa3;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa4;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa5;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa6;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa7;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa8;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPT(16,(1:50),:)); 
Z= ohnapa8;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa9;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa10;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa11;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa12;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa13;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa14;
surface_discrepancy_dam(Zref, Z, x, y)

Zref= squeeze(EEMNAPA(17,:,:)); 
Z= ohnapa15;
surface_discrepancy_dam(Zref, Z, x, y)

%%%%%%BILIS EXPUESTA A PIRENO %%%%%% 
x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra1;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra2;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra3;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra4;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra5;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra6;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra7;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra8;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra9;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra10;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra11;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra12;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra13;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra14;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra15;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra16;
surface_discrepancy_dam(Zref, Z, x, y)

x=ex;
y=em(1:74,1);
Zref= squeeze(EEMPYRA(19,:,:)); 
Z= ohpyra17;
surface_discrepancy_dam(Zref, Z, x, y)